perm filename TEST.PAS[TEX,DEK] blob sn#481156 filedate 1979-10-15 generic text, type C, neo UTF8
COMMENT āŠ—   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	if x>0 THEN GOTO Jail else PUNT
C00003 ENDMK
CāŠ—;
if x>0 THEN GOTO Jail else PUNT;